home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / doc / Visual Basic / Image900.gif < prev    next >
Graphics Interchange Format  |  1999-11-20  |  171.0 KB  |  590x334  |  8-bit (135 colors)
   ocr: N EEDNIACYASCII AS integer If KeyAscii = 13 Then If Text6.Text ## Then Label7.Caption = "Ipeaynpexnenne lext7.Text M "BBenure HOIKHOCTE Text6.SetFocus GOTO Finish5 End If If Label7.Caption l "Ipenynpexnesne I Then Label7.Caption. = "PesyJbTar' Text7.Text = n End If Command4.Enabled = : True End If Finish5: End Sub